; Music of Operation Wolf (1988) (Ocean Software) (Jonathan Dunn)
; Ripped by Megachur the 27/10/2006

	write "OPERATIW.BIN"

music_date_rip	equ &1ba6
music_adr	equ &333c
first_theme	equ 0
last_theme	equ 3

	read "music_header_v1_0.asm"
;
.init_music	;.l333c
;
; 0 prepare to fire !
; 1 mission terminated
; 2 main theme
; 3 infiltrate !
;
	ld hl,l396f	; l3970
	ld b,#00
	ld (hl),b
	inc hl
	ld (hl),b
	ld c,a
	add a
	add c
	add a
	add c
	ld c,a
	ld hl,l3972
	add hl,bc
	ld a,(hl)
	ld (l341d),a
	inc hl
	ld ix,l338d
	ld c,#21
	ld a,#03
.l3353
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	push hl
	ld (ix+#10),#01
	ld (ix+#00),b
	ld (ix+#1d),b
	ld (ix+#1f),b
	ld (ix+#03),e
	ld (ix+#04),d
	ex de,hl
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld (ix+#05),#02
	ld (ix+#06),b
	pop hl
	ld (ix+#01),e
	ld (ix+#02),d
	add ix,bc
	dec a
	jr nz,l3353
	ld (l36b7),a
	inc a
	ld (l33f0),a
	ld (l396f),a
	ret
.l338d
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #09
.l33ae
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #12
.l33cf
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #24
.l33f0
	db #00
;
.play_music	;.l33f1
;
	call l39e9
	ld a,(l396f)
	and a
	jp z,l344d
.l33fc equ $ + 1
	ld a,#00
	ld (l3449),a
	ld hl,l33f0
	dec (hl)
	jr nz,l3421
	ld b,(hl)

	ld ix,l338d
	call l35c6

	ld ix,l33ae
	call l35c6

	ld ix,l33cf
	call l35c6
.l341d equ $ + 1
	ld a,#01
	ld (l33f0),a
.l3421
	ld ix,l338d
	call l3684
	ld (l3794),hl
	ld (l379c),a

	ld ix,l33ae
	call l3684
	ld (l3796),hl
	ld (l379d),a

	ld ix,l33cf
	call l3684
	ld (l3798),hl
	ld (l379e),a
.l3449 equ $ + 1
	ld a,#00
	ld (l379a),a
.l344d
	ld a,(l3970)
	and a
	jr z,l347d
	ld hl,(l37a1)
	ld (l3794),hl
	ld hl,(l37a5)
	ld (l3798),hl
	ld a,(l37a7)
.l3463 equ $ + 1
	ld (l379a),a
	ld a,(l379b)
	or #2d
	ld hl,l37a8
	and (hl)
	ld (l379b),a
	ld a,(l37a9)
	ld (l379c),a
	ld a,(l37ab)
	ld (l379e),a
.l347d
	ld a,(l396f)
	ld hl,l3970
	or (hl)
	ret z

	ld hl,l379f
	ld d,#0b
.l348a
	ld e,(hl)
	ld b,#f4
	out (c),d
	ld bc,#f600
	out (c),c
	ld a,#c0
	out (c),a
	out (c),c
	ld b,#f4
	out (c),e
	ld b,#f6
	add a
	out (c),a
	out (c),c
	dec hl
	dec d
	jp p,l348a
	ret
.l34ab
	ld de,#0d00
.l34ae
	call l34b8
	dec d
	jp p,l34ae
	ld de,#0000

.l34b8
	ld b,#f4
	out (c),d
	ld bc,#f600
	out (c),c
	ld a,#c0
	out (c),a
	out (c),c
	ld b,#f4
	out (c),e
	ld b,#f6
	add a
	out (c),a
	out (c),c
	ret
;
.stop_music
;
	xor a
	ld (l396f),a
	ld (l3970),a
	call l34ab
	xor a
	ld (l379c),a
	ld (l379d),a
	ld (l379e),a
	ret
;
.jumps_table
;
	db l35ac-$	; #c9
	db l3595-$	; #b1
	db l359a-$	; #b5
	db l35a0-$	; #ba
	db l355f-$	; #78
	db l358f-$	; #a7
	db l358b-$	; #a2
	db l34f9-$	; #0f
	db l357c-$	; #91
	db l3575-$	; #89
	db l353b-$	; #4e
	db l3526-$	; #38
	db l354f-$	; #60
	db l35a6-$	; #b6
	db l34f5-$	; #04
	db l35b5-$	; #c3
	db l35bb-$	; #c8
	db l35c1-$	; #cd
.l34f5
	pop hl
	jp stop_music	;	jp l34ab
.l34f9
	ld c,(ix+#05)
	ld b,(ix+#06)
	ld l,(ix+#03)
	ld h,(ix+#04)
	add hl,bc
	inc bc
	inc bc
	ld a,(hl)
	inc hl
	ld d,(hl)
	ld e,a
	or d
	jr nz,l351b
	ld l,(ix+#03)
	ld h,(ix+#04)
	ld bc,#0002
	ld e,(hl)
	inc hl
	ld d,(hl)
.l351b
	ld (ix+#05),c
	ld (ix+#06),b
	ld b,#00
	jp l35d4
.l3526
	ld a,(ix+#20)
	ld c,a
	and #07
	ld hl,l3760
	xor (hl)
	and c
	xor (hl)
	ld (hl),a
	ld a,#01
	ld (ix+#1e),a
	jp l35d4
.l353b
	ld a,(ix+#20)
	ld c,a
	and #38
	ld hl,l3760
	xor (hl)
	and c
	xor (hl)
	ld (hl),a
	xor a
	ld (ix+#1e),a
	jp l35d4
.l354f
	ld hl,l3760
	ld a,(ix+#20)
	cpl
	and (hl)
	ld (hl),a
	ld a,#01
	ld (ix+#1e),a
	jr l35d4
.l355f
	ld a,(de)
	inc de
	ld (ix+#07),b
	ld (ix+#08),b
	ld (ix+#0d),a
	set 2,(ix+#00)
	ld a,(de)
	ld (ix+#0e),a
	inc de
	jr l35d4
.l3575
	ld a,(de)
	inc de
	ld (l36b7),a
	jr l35d4
.l357c
	ld a,(de)
	ld (ix+#1b),a
	inc de
	ld a,(de)
	ld (ix+#1a),a
	inc de
	ld (ix+#1c),a
	jr l35d4
.l358b
	set 7,(ix+#00)
.l358f
	set 3,(ix+#00)
	jr l35d4
.l3595
	ld (ix+#1d),b
	jr l35d4
.l359a
	ld (ix+#1d),#40
	jr l35d4
.l35a0
	ld (ix+#1d),#c0
	jr l35d4
.l35a6
	set 1,(ix+#00)
	jr l35d4
.l35ac
	ld (ix+#13),b
	res 5,(ix+#00)
	jr l3603
.l35b5
	res 5,(ix+#00)
	jr l3603
.l35bb
	ld (ix+#1f),#ff
	jr l35d4
.l35c1
	ld (ix+#1f),b
	jr l35d4
.l35c6
	dec (ix+#10)
	jr nz,l361e
	ld (ix+#00),b
	ld e,(ix+#01)
	ld d,(ix+#02)
.l35d4
	ld a,(de)
	inc de
	and a
	jp m,l362f
	ld (ix+#12),a
	bit 0,(ix+#1e)
	jr z,l35e6
	ld (l33fc),a
.l35e6
	ld l,(ix+#14)
	ld (ix+#16),l
	ld h,(ix+#15)
	ld (ix+#17),h
	ld a,(hl)
	ld (ix+#18),a
	ld (ix+#13),a
	ld a,(ix+#0f)
	ld (ix+#19),a
	set 5,(ix+#00)
.l3603
	ld a,(ix+#11)
	ld (ix+#10),a
	ld (ix+#02),d
	ld (ix+#01),e
	ld a,(ix+#1f)
	and a
	ret z
	ld a,(l3970)
	and a
	ret nz
	ld (ix+#1f),#ff
	ret
.l361e
	ld a,(ix+#00)
	bit 3,a
	ret z
	rla
	jr nc,l362b
	inc (ix+#12)
	ret
.l362b
	dec (ix+#12)
	ret
.l362f
	cp #b8
	jr c,l367c
	add #20
	jr c,l365d
	add #10
	jr c,l3664
	add #10
	jr nc,l3655
	ld c,a
	ld hl,l386d
	add hl,bc
	ld c,(hl)
	add hl,bc
	ld (ix+#0b),l
	ld (ix+#09),l
	ld (ix+#0c),h
	ld (ix+#0a),h
	jp l35d4
.l3655
	add #09
	ld (l341d),a
	jp l35d4
.l365d
	inc a
	ld (ix+#11),a
	jp l35d4
.l3664
	ld hl,l38ae
	add a
	ld c,a
	add hl,bc
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	ld (ix+#14),l
	ld (ix+#15),h
	dec hl
	ld a,(hl)
	ld (ix+#0f),a
	jp l35d4
.l367c
	ld hl,jumps_table-&80	; l3463
	ld c,a
	add hl,bc
	ld c,(hl)
	add hl,bc
	jp (hl)
.l3684
	ld c,(ix+#00)
	bit 5,c
	jr z,l36b6
	ld a,(ix+#19)
	sub #01
	ld (ix+#19),a
	jr nc,l36b0
	ld a,(ix+#0f)
	ld (ix+#19),a
	ld l,(ix+#16)
	ld h,(ix+#17)
	inc hl
	ld a,(hl)
	and a
	jp m,l36b0
	ld (ix+#16),l
	ld (ix+#17),h
	ld (ix+#18),a
.l36b0
	ld a,(ix+#18)
	ld (ix+#13),a
.l36b7 equ $ + 1
.l36b6
	ld a,#00
	add (ix+#12)
	ld b,a
	ld l,(ix+#0b)
	ld h,(ix+#0c)
	ld a,(hl)
	inc hl
	and a
	jp p,l36d0
	ld l,(ix+#09)
	ld h,(ix+#0a)
	and #7f
.l36d0
	ld (ix+#0b),l
	ld (ix+#0c),h
	add b
	ld hl,l37ad
	ld d,#00
	add a
	ld e,a
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld l,(ix+#1d)
	bit 6,l
	jr z,l3731
	ld h,a
	ld b,(ix+#1a)
	sla b
	bit 7,l
	ld a,(ix+#1c)
	jr z,l36fa
	bit 0,c
	jr nz,l3718
.l36fa
	bit 5,l
	jr nz,l370a
	sub (ix+#1b)
	jr nc,l3715
	set 5,(ix+#1d)
	sub a
	jr l3715
.l370a
	add (ix+#1b)
	cp b
	jr c,l3715
	res 5,(ix+#1d)
	ld a,b
.l3715
	ld (ix+#1c),a
.l3718
	ex de,hl
	srl b
	sub b
	ld e,a
	ld a,d
	ld d,#00
	jr nc,l3723
	dec d
.l3723
	add #a0
	jr c,l372f
.l3727
	sla e
	rl d
	add #18
	jr nc,l3727
.l372f
	add hl,de
	ex de,hl
.l3731
	ld a,c
	xor #01
	ld (ix+#00),a
	bit 2,c
	jr z,l375c
	ld b,(ix+#0e)
	djnz l3759
	ld c,(ix+#0d)
	bit 7,c
	jr z,l3748
	dec b
.l3748
	ld l,(ix+#07)
	ld h,(ix+#08)
	add hl,bc
	ld (ix+#07),l
	ld (ix+#08),h
	add hl,de
	ex de,hl
	jr l375c
.l3759
	ld (ix+#0e),b
.l375c
	cpl
	and #03
.l3760 equ $ + 1
	ld a,#00
	jr nz,l376d
	ld a,(l33fc)
	xor #08
	ld (l3449),a
	ld a,#07
.l376d
	ld hl,l379b
	xor (hl)
	and (ix+#20)
	xor (hl)
	ld (hl),a
	ld a,(ix+#1f)
	and a
	jp p,l378f
	and #7f
	ld (ix+#1f),a
	ld a,(ix+#20)
	and #38
	cpl
	and (hl)
	ld (hl),a
	ld a,#41
	ld (l3449),a
.l378f
	ex de,hl
	ld a,(ix+#13)
	ret
.l3794
	defw 0	; db #00,#00	; reg0-reg1
.l3796
	defw 0	; db #00,#00	; reg2-reg3
.l3798
	defw 0	; db #00,#00	; reg4-reg5
.l379a
	db #00
.l379b
	db #3f
.l379c
	db #0f
.l379d
	db #0f
.l379e
	db #0f
.l379f
	db #00,#00
.l37a1
	db #00
.l37a2
	db #00,#00
	db #00
.l37a5
	db #00,#00
.l37a7
	db #00
.l37a8
	db #3f	
.l37a9
	db #10,#00
.l37ab
	db #10,#00
.l37ad
	defw #077c,#0708,#06b0,#0640
	defw #05ec,#0594,#0544,#04f8
	defw #04b0,#0470,#042c,#03f0
	defw #03be,#0384,#0358,#0320
	defw #02f6,#02ca,#02a2,#027c
	defw #0258,#0238,#0216,#01f8
	defw #01df,#01c2,#01ac,#0190
	defw #017b,#0165,#0151,#013e
	defw #012c,#011c,#010b,#00fc
	defw #00ef,#00e1,#00d6,#00c8
	defw #00bd,#00b2,#00a8,#009f
	defw #0096,#008e,#0085,#007e
	defw #0077,#0070,#006b,#0064
	defw #005e,#0059,#0054,#004f
	defw #004b,#0047,#0042,#003f
	defw #003b,#0038,#0035,#0032
	defw #002f,#002c,#002a,#0027
	defw #0025,#0023,#0021,#001f
	defw #001d,#001c,#001a,#0019
	defw #0017,#0016,#0015,#0013
	defw #0012,#0011,#0010,#000f
	defw #000e,#000e,#000d,#000c
	defw #000b,#000b,#000a,#0009
	defw #0009,#0008,#0008,#0007
.l386d
	db #0e,#0e,#11,#14,#17,#18,#1b,#1e
	db #21,#24,#27,#2a,#2b,#31,#80,#0c
	db #00,#07,#80,#0c,#00,#08,#80,#0c
	db #00,#09,#80,#0c,#80,#18,#00,#0c
	db #80,#00,#03,#07,#8c,#00,#04,#07
	db #8c,#00,#04,#08,#8c,#0c,#00,#00
	db #80,#0c,#00,#f4,#80,#00,#85,#18
	db #00,#00,#00,#00,#00,#80,#04,#07
	db #8c
.l38ae
	dw l38c5,l38c8,l38cc
	dw l38de,l3900,l3904,l392e
	dw l3934,l394f,l395b,l3964

l38c5 equ $ +1
	db #00,#0d,#87
l38c8 equ $ +1
	db #0a,#0f,#0a,#87
l38cc equ $ +1
	db #01,#0f,#0e,#0c,#0b,#0d,#0c,#0a
	db #09,#0b,#0a,#08,#07,#09,#08,#06
	db #05,#87
l38de equ $ +1
	db #08,#0f,#0e,#0d,#0c,#0b,#0d,#0c
	db #0b,#0a,#09,#09,#08,#07,#07,#06
	db #07,#06,#05,#04,#04,#04,#04,#04
	db #03,#04,#04,#03,#02,#01,#02,#01
	db #00,#87
l3900 equ $ +1
	db #0a,#0f,#0e,#87
l3904 equ $ +1
	db #02,#0f,#0e,#0d,#0c,#0b,#0d,#0c
	db #0b,#0a,#09,#0b,#0a,#09,#08,#07
	db #09,#08,#07,#06,#05,#07,#06,#05
	db #04,#03,#05,#04,#03,#02,#01,#04
	db #03,#02,#01,#03,#02,#01,#02,#01
	db #00,#87
l392e equ $ +1
	db #00,#0b,#0f,#0b,#08,#87
l3934 equ $ +1
	db #00,#0a,#0b,#0c,#0d,#0e,#0f,#0f
	db #0e,#0e,#0e,#0e,#0d,#0d,#0c,#0c
	db #0c,#0c,#0b,#0b,#0b,#0b,#0a,#0a
	db #0a,#0a,#87
l394f equ $ +1
	db #01,#0c,#0b,#0a,#09,#08,#07,#09
	db #08,#07,#06,#87
l395b equ $ +1
	db #00,#0e,#0f,#0e,#0d,#0c,#0d,#0e
	db #87
l3964 equ $ +1
	db #01,#0e,#0d,#0c,#0b,#0a,#09,#0b
	db #0a,#09,#08,#87
.l396f
.music_end
	db #00
.l3970
	db #00
.l3971
	db #ff
.l3972
	db #03
	dw l3b7b,l3b7f,l3b87
	db #03
	dw l3b8b,l3b8f,l3b97
	db #03
	dw l3b9f,l3ba3,l3ba7
	db #02
	dw l3bab,l3bb3,l3bbb
	
	ld hl,l3970
	ld b,a
	ld a,(l3971)
	cp b
	ret c
	ld a,b
	ld (hl),#00
	ld (l3971),a
	ld hl,l3a8b
	add a
	add l
	ld l,a
	jr nc,l39a6
	inc h
.l39a6
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld b,#11
	ld hl,l3b49
.l39ae
	ld a,(de)
	ld (hl),a
	inc hl
	inc de
	djnz l39ae
	ld a,(l3b4a)
	ld (l3b5a),a
	ld hl,(l3b4b)
	ld (l37a1),hl
	ld de,(l3b4d)
	ld (l37a5),de
	ld a,l
	ld (l37a7),a
	ld a,(l3b50)
	ld (l37a8),a
	ld a,(l3b4f)
	ld e,a
	ld d,#0c
	call l34b8
	ld a,(l3b59)
	ld e,a
	ld d,#0d
	call l34b8
	ld hl,l3970
	inc (hl)
	ret
.l39e9
	call l3b5c
	ld a,(l3970)
	and a
	ret z
	ld a,(l3b49)
	and a
	jr nz,l3a01
	ld (l3970),a
	cpl
	ld (l3971),a
	jp stop_music	;jp l34ab
.l3a01
	dec a
	ld (l3b49),a
	ld a,(l3b5a)
	and a
	jr nz,l3a3a
	ld a,(l3b57)
	and a
	ret z
	dec a
	ld (l3b57),a
	ld a,(l3b4a)
	ld (l3b5a),a
	ld a,(l3b58)
	and a
	jr z,l3a23
	ld a,(l3b77)
.l3a23
	ld b,a
	ld a,(l3b4b)
	add b
	ld (l37a1),a
	ld a,(l3b4c)
	add b
	and #0f
	ld (l37a2),a
	ld hl,(l3b4d)
	ld (l37a5),hl
.l3a3a
	ld hl,l3b5a
	dec (hl)
	ld a,(l3b55)
	and a
	jr z,l3a61
	jp p,l3a54
	ld hl,(l37a1)
	ld de,(l3b51)
	add hl,de
	ld (l37a1),hl
	jr l3a61
.l3a54
	ld hl,(l37a1)
	ld de,(l3b51)
	and a
	sbc hl,de
	ld (l37a1),hl
.l3a61
	ld a,(l3b56)
	and a
	jr z,l3a84
	jp p,l3a77
	ld hl,(l37a5)
	ld de,(l3b53)
	add hl,de
	ld (l37a5),hl
	jr l3a84
.l3a77
	ld hl,(l37a5)
	ld de,(l3b53)
	and a
	sbc hl,de
	ld (l37a5),hl
.l3a84
	ld a,(l37a1)
	ld (l37a7),a
	ret
.l3a8b
	dw l3ac1,l3ad2,l3b27,l3ab0
	dw l3ae3,l3af4,l3b05,l3b16
	dw l3b38,l3a9f
	
l3a9f
	db #05,#05,#08,#00,#00,#02,#05,#f6
	db #18,#00,#10,#00,#01,#01,#0a,#01
	db #00
l3ab0
	db #07,#03,#04,#00,#0b,#00,#0f,#fa
	db #10,#00,#08,#00,#ff,#ff,#0a,#00
	db #00
l3ac1
	db #03,#08,#f0,#00,#c0,#00,#0f,#fa
	db #10,#00,#08,#00,#ff,#ff,#01,#00
	db #00
l3ad2
	db #03,#08,#80,#01,#28,#02,#0f,#fa
	db #18,#00,#10,#00,#ff,#ff,#0a,#00
	db #00
l3ae3
	db #14,#06,#01,#02,#11,#02,#14,#f2
	db #c8,#00,#cc,#00,#ff,#ff,#ff,#00
	db #00
l3af4
	db #0f,#06,#81,#01,#91,#02,#14,#f2
	db #20,#00,#44,#00,#01,#ff,#50,#01
	db #00
l3b05
	db #14,#03,#00,#44,#00,#00,#14,#d7
	db #80,#00,#40,#00,#ff,#01,#1e,#01
	db #00
l3b16
	db #1e,#07,#c4,#00,#8b,#01,#0c,#f2
	db #78,#00,#78,#00,#ff,#ff,#0a,#00
	db #00
l3b27
	db #0a,#04,#0a,#01,#17,#01,#09,#fa
	db #07,#00,#04,#00,#ff,#ff,#0f,#00
	db #00
l3b38
	db #05,#05,#08,#00,#00,#01,#05,#f6
	db #08,#00,#10,#00,#01,#01,#0a,#01
	db #00
.l3b49
	db #00
.l3b4a
	db #00
.l3b51 equ $ + 6
.l3b50 equ $ + 5
.l3b4f equ $ + 4
.l3b4d equ $ + 2
.l3b4c equ $ + 1
.l3b4b
	db #00,#00,#00,#00,#00,#00,#00,#00
.l3b5a equ $ + 7
.l3b59 equ $ + 6
.l3b58 equ $ + 5
.l3b57 equ $ + 4
.l3b56 equ $ + 3
.l3b55 equ $ + 2
.l3b53
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00
.l3b5c
	ld a,(l3b77)
	and #48
	adc #38
	sla a
	sla a
	ld hl,l3b7a
	rl (hl)
	dec hl
	rl (hl)
	dec hl
	rl (hl)
	dec hl
	rl (hl)
	ld a,(hl)
	ret
.l3b77
	db #ff,#80
.l3b7a equ $ +1
	db &1b,&34
.l3b7b
	dw l3bc8,#0000
.l3b7f
	dw l3be7,l3be7,l3c04,#0000
.l3b87
	dw l3c28,#0000
.l3b8b
	dw l3c4c,#0000
.l3b8f
	dw l3cba,l3cba,l3c67,#0000
.l3b97
	dw l3c81,l3c81,l3c9e,#0000
.l3b9f
	dw l3cd7,#0000
.l3ba3
	dw l3cfc,#0000
.l3ba7
	dw l3d11,#0000
.l3bab
	dw l3d50,l3d50,l3d79,#0000
.l3bb3	
	dw l3d60,l3d60,l3d79,#0000
.l3bbb
	dw l3d3a,l3d3a,l3d3a,l3d70
	dw #0000

	db #ff,#80,#87
l3bc8
	db #8a,#88,#01,#01,#82,#c0,#90,#d7
	db #eb,#32,#f3,#39,#ef,#8f,#e7,#35
	db #34,#eb,#35,#f3,#3c,#eb,#8f,#e3
	db #80,#e7,#3c,#3d,#e3,#3e,#8e,#8a
	db #88,#01,#01
l3be7
	db #82,#c5,#90,#d6,#e3,#32,#e1,#32
	db #32,#e3,#32,#e1,#32,#32,#e3,#32
	db #e1,#32,#32,#e3,#32,#e1,#32,#32
	db #87
l3c04
	db #e3,#35,#e1,#35,#35,#e3,#35,#e1
	db #35,#35,#e3,#35,#e1,#35,#35,#e3
	db #35,#e1,#35,#35,#e3,#35,#e1,#35
	db #35,#e3,#35,#e1,#35,#35,#e7,#35
	db #34,#e3,#32,#87
l3c28
	db #8a,#88,#01,#01,#82,#c4,#90,#d5
	db #f3,#80,#e1,#26,#29,#2d,#29,#26
	db #29,#ff,#2d,#f3,#80,#e1,#29,#2c
	db #30,#2c,#29,#2c,#ef,#30,#e7,#29
	db #28,#e3,#26,#87
l3c4c
	db #8a,#88,#01,#01,#82,#c0,#90,#d9
	db #eb,#32,#39,#f3,#37,#e3,#35,#37
	db #35,#34,#32,#eb,#2d,#32,#e7,#3e
	db #ff,#8f,#8e
l3c67
	db #e3,#32,#e1,#32,#32,#e3,#32,#32
	db #e1,#32,#32,#e3,#32,#e7,#81,#37
	db #e3,#80,#37,#37,#35,#35,#34,#30
	db #32,#87
l3c81
	db #8a,#88,#01,#01,#82,#c0,#90,#d6
	db #e3,#26,#e1,#26,#26,#e3,#26,#e1
	db #26,#26,#e3,#26,#e1,#26,#26,#e3
	db #26,#e1,#26,#26,#87
l3c9e
	db #e3,#26,#e1,#26,#26,#e3,#26,#26
	db #e1,#26,#26,#e3,#26,#e7,#81,#c5
	db #d6,#3e,#e3,#80,#3e,#3e,#3c,#30
	db #3b,#37,#45,#87
l3cba
	db #8a,#88,#01,#01,#82,#c5,#90,#d6
	db #e3,#32,#e1,#32,#32,#e3,#32,#e1
	db #32,#32,#e3,#32,#e1,#32,#32,#e3
	db #32,#e1,#32,#32,#87
l3cd7
	db #8a,#88,#01,#01,#82,#c0,#90,#d5
	db #e3,#1a,#1c,#e5,#10,#e1,#1a,#80
	db #1a,#e3,#1c,#e7,#10,#e3,#1a,#1c
	db #e5,#10,#e1,#1a,#80,#1a,#e3,#1c
	db #e5,#10,#e1,#10,#87
l3cfc
	db #8a,#81,#90,#d7,#c6,#eb,#34,#c7
	db #f3,#37,#ff,#8f,#c6,#eb,#36,#f3
	db #c7,#39,#ff,#8f,#87
l3d11
	db #8a,#88,#01,#01,#83,#c9,#90,#d3
	db #fd,#2f,#e1,#31,#ff,#32,#fd,#31
	db #e1,#32,#ff,#34,#c0,#d7,#fd,#32
	db #e1,#34,#ef,#36,#e5,#36,#34,#e3
	db #32,#88,#01,#02,#82,#ff,#34,#8f
	db #87
l3d3a
	db #8a,#88,#01,#01,#82,#c0,#d8,#90
	db #e1,#34,#32,#30,#2f,#30,#32,#34
	db #32,#30,#2f,#30,#32,#87
l3d50
	db #8a,#88,#01,#01,#83,#c0,#d2,#e7
	db #80,#e5,#28,#e9,#29,#f7,#8f,#87
l3d60
	db #8a,#88,#01,#01,#83,#c0,#d2,#e7
	db #80,#e5,#2f,#e9,#30,#f7,#8f,#87
l3d70
	db #d6,#c4,#e7,#2f,#30,#32,#f7,#8f
	db #8e
l3d79
	db #f7,#8f,#ff,#c0,#7f,#87


;org #1fcc	; exemple bruitage ?
;ld c,#0e
;call #333c
;.l1fd1
;call #309a	; lecture clavier
;call #2e8e	; synchro vbl
;call #33f1
;ld a,(#3ffe)
;ld h,a
;and #01
;jr z,#2049
;ld a,h
;and #02
;jr nz,l1fd1
;call #34ab


;org #332a	; exemple play
;.l332a
;call l333c	; init
;.l332d
;call &bd19
;;call #2e8e
;call l33f1	; play
;ld a,(#396f)	; end music
;or a
;jr nz,l332d
;jp l34ab	; stop

.game_name
	db "Operation Wolf",0
.game_year
	db "1988",0
.game_publisher
	db "Ocean Software",0
.music_author
	db "Jonathan Dunn",0
.music_comment
	db "",0
	
	read "music_end_v1_0.asm"
